home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_400 / 424_02 / ED-157 / backspace.c < prev    next >
C/C++ Source or Header  |  1993-09-10  |  1KB  |  50 lines
  1. /*
  2.  * Copyright (C) 1992 by Rush Record (rhr@clio.rice.edu)
  3.  * 
  4.  * This file is part of ED.
  5.  * 
  6.  * ED is free software; you can redistribute it and/or modify it under the terms
  7.  * of the GNU General Public License as published by the Free Software Foundation.
  8.  * 
  9.  * ED is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
  10.  * without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
  11.  * PARTICULAR PURPOSE.  See the GNU General Public License for more details.
  12.  * 
  13.  * You should have received a copy of the GNU General Public License along with ED
  14.  * (see the file COPYING).  If not, write to the Free Software Foundation, 675
  15.  * Mass Ave, Cambridge, MA 02139, USA.
  16.  */
  17. #include "opsys.h"
  18.  
  19. #include "rec.h"
  20. #include "window.h"
  21. #include "ed_dec.h"
  22.  
  23. /******************************************************************************\
  24. |Routine: backspace
  25. |Callby: edit move_line
  26. |Purpose: Implements the EDT-like behavior of the backspace key (control-H).
  27. |         If at the beginning of a line, move up, else, move to the beginning
  28. |         of the line.
  29. |Arguments:
  30. |    repeat is the repeat count applied to the action.
  31. \******************************************************************************/
  32. void backspace(repeat)
  33. register Int repeat;
  34. {
  35.     if(CURCOL == 1)
  36.         up_arrow(repeat);
  37.     else
  38.     {
  39.         CURBYT = 0;
  40.         CURCOL = 1;
  41.         if(repeat > 1)
  42.         {
  43.             WANTCOL = 1;
  44.             up_arrow(repeat - 1);
  45.         }
  46.     }
  47.     WANTCOL = CURCOL;
  48. }
  49.  
  50.